home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1996 July / Macworld (1996-07).dmg / Demos / frEQout demo / INTERVU / INTERVU / INTERVU.DXR / 00158.ls < prev    next >
Encoding:
Text File  |  1996-03-28  |  140 b   |  8 lines

  1. on fadesoundup
  2.   if soundBusy(5) = 0 then
  3.     repeat with vol = 1 to 4
  4.       set the volume of sound vol to 255
  5.     end repeat
  6.   end if
  7. end
  8.